################
#PSRM: Explaining Support for Redistribution: Social Insurance Systems and Fairness
#
#Observational Data: Eurobarometer
#Part I: Recode
#
#Verena Fetscher
#July 2022
####################

rm(list=ls())

#setwd("your/master/file/location")

sink("analysis_EB_logr.log")

########################
#Load Packages
########################

library(tidyverse)
library(texreg)
library(DeclareDesign)
library(ggeffects)

# Appendix
source("table_c6.R", echo=TRUE, max.deparse.length=Inf) #Produces Table C.6
source("figure_c10.R", echo=TRUE, max.deparse.length=Inf) #Produces Figure C.10
source("figure_c11.R", echo=TRUE, max.deparse.length=Inf) #Produces Figure C.11
source("figure_c12.R", echo=TRUE, max.deparse.length=Inf) #Produces Figure C.12

sink()
